(* Content-type: application/vnd.wolfram.mathematica *)

(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)

(* CreatedBy='Mathematica 8.0' *)

(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[       157,          7]
NotebookDataLength[     67284,       1552]
NotebookOptionsPosition[     65632,       1514]
NotebookOutlinePosition[     66060,       1531]
CellTagsIndexPosition[     66017,       1528]
WindowFrame->Normal*)

(* Beginning of Notebook Content *)
Notebook[{

Cell[CellGroupData[{
Cell["\<\
Opening propensity in this code is defined as Pref=KdC/KdEO, i. e. = KaEO/KaC;
Usually the ensemble affinity of compound, Kaens (1/Kdens), is measured. In \
this code, the intrinsic affinities  of drug to the closed states and the EO \
state are solved based on the ensemble affinity is the population weighted \
contribution from each conformational.\
\>", "Subsubtitle",
 CellChangeTimes->{{3.668773472736165*^9, 3.6687735033362074`*^9}, 
   3.6694642318258524`*^9, {3.84763701769219*^9, 3.847637040218746*^9}, {
   3.8672302656150293`*^9, 3.867230588719453*^9}, {3.867230903657712*^9, 
   3.867230905417178*^9}},ExpressionUUID->"5bd0bd57-c650-483d-a4b3-\
9bce0f395b51"],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{
  RowBox[{"R", "=", "0.001986"}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"deltaGEO", "=", "0"}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"KaC", "=", 
   RowBox[{"KaEO", "/", "Pref"}]}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"Q", "=", 
   RowBox[{
    RowBox[{"Exp", "[", 
     RowBox[{"-", 
      FractionBox["deltaGBC", 
       RowBox[{"R", "*", "T"}]]}], "]"}], "+", 
    RowBox[{"Exp", "[", 
     RowBox[{"-", 
      FractionBox["deltaGEC", 
       RowBox[{"R", "*", "T"}]]}], "]"}], "+", 
    RowBox[{"Exp", "[", 
     RowBox[{"-", 
      FractionBox["deltaGEO", 
       RowBox[{"R", "*", "T"}]]}], "]"}]}]}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"PEO", "=", 
   RowBox[{
    RowBox[{"Exp", "[", 
     RowBox[{"-", 
      FractionBox["deltaGEO", 
       RowBox[{"R", "*", "T"}]]}], "]"}], "/", "Q"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"PEC", "=", 
   RowBox[{
    RowBox[{"Exp", "[", 
     RowBox[{"-", 
      FractionBox["deltaGEC", 
       RowBox[{"R", "*", "T"}]]}], "]"}], "/", "Q"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"PBC", "=", 
    RowBox[{
     RowBox[{"Exp", "[", 
      RowBox[{"-", 
       FractionBox["deltaGBC", 
        RowBox[{"R", "*", "T"}]]}], "]"}], "/", "Q"}]}], ";"}], 
  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{"Solve", "[", 
  RowBox[{
   RowBox[{"Kaens", "==", 
    RowBox[{
     RowBox[{"PEO", "*", "KaEO"}], "+", 
     RowBox[{
      RowBox[{"(", 
       RowBox[{"PBC", "+", "PEC"}], ")"}], "*", "KaC"}]}]}], ",", "KaEO"}], 
  "]"}]}], "Input",
 CellChangeTimes->{{3.8476360885710163`*^9, 3.847636109621264*^9}, {
  3.847636174048173*^9, 3.847636276978606*^9}, {3.847637773606683*^9, 
  3.847637794638962*^9}, {3.8672305945367393`*^9, 3.867230750680437*^9}},
 CellLabel->"In[1]:=",ExpressionUUID->"3f76ff3e-8af3-413b-b7a3-0fa7a32792cb"],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{"{", 
   RowBox[{"KaEO", "\[Rule]", 
    RowBox[{"-", 
     FractionBox[
      RowBox[{"1.`", " ", "Kaens"}], 
      RowBox[{
       RowBox[{"-", 
        FractionBox["1.`", 
         RowBox[{"1.`", "\[VeryThinSpace]", "+", 
          SuperscriptBox["\[ExponentialE]", 
           RowBox[{"-", 
            FractionBox[
             RowBox[{"503.5246727089628`", " ", "deltaGBC"}], "T"]}]], "+", 
          SuperscriptBox["\[ExponentialE]", 
           RowBox[{"-", 
            FractionBox[
             RowBox[{"503.5246727089628`", " ", "deltaGEC"}], "T"]}]]}]]}], 
       "-", 
       FractionBox[
        RowBox[{"1.`", " ", 
         RowBox[{"(", 
          RowBox[{
           FractionBox[
            SuperscriptBox["\[ExponentialE]", 
             RowBox[{"-", 
              FractionBox[
               RowBox[{"503.5246727089628`", " ", "deltaGBC"}], "T"]}]], 
            RowBox[{"1.`", "\[VeryThinSpace]", "+", 
             SuperscriptBox["\[ExponentialE]", 
              RowBox[{"-", 
               FractionBox[
                RowBox[{"503.5246727089628`", " ", "deltaGBC"}], "T"]}]], "+", 
             SuperscriptBox["\[ExponentialE]", 
              RowBox[{"-", 
               FractionBox[
                RowBox[{"503.5246727089628`", " ", "deltaGEC"}], "T"]}]]}]], 
           "+", 
           FractionBox[
            SuperscriptBox["\[ExponentialE]", 
             RowBox[{"-", 
              FractionBox[
               RowBox[{"503.5246727089628`", " ", "deltaGEC"}], "T"]}]], 
            RowBox[{"1.`", "\[VeryThinSpace]", "+", 
             SuperscriptBox["\[ExponentialE]", 
              RowBox[{"-", 
               FractionBox[
                RowBox[{"503.5246727089628`", " ", "deltaGBC"}], "T"]}]], "+", 
             SuperscriptBox["\[ExponentialE]", 
              RowBox[{"-", 
               FractionBox[
                RowBox[{"503.5246727089628`", " ", "deltaGEC"}], "T"]}]]}]]}],
           ")"}]}], "Pref"]}]]}]}], "}"}], "}"}]], "Output",
 CellChangeTimes->{
  3.8476362775125017`*^9, {3.847637799218543*^9, 3.847637813266419*^9}, 
   3.867230765621193*^9},
 CellLabel->"Out[8]=",ExpressionUUID->"becf0b34-70ee-477a-9d5b-8609338d4130"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"KaEO", "=", 
  RowBox[{"Simplify", "[", 
   RowBox[{"-", 
    FractionBox[
     RowBox[{"1.`", " ", "Kaens"}], 
     RowBox[{
      RowBox[{"-", 
       FractionBox["1.`", 
        RowBox[{"1.`", "\[VeryThinSpace]", "+", 
         SuperscriptBox["\[ExponentialE]", 
          RowBox[{"-", 
           FractionBox[
            RowBox[{"503.5246727089628`", " ", "deltaGBC"}], "T"]}]], "+", 
         SuperscriptBox["\[ExponentialE]", 
          RowBox[{"-", 
           FractionBox[
            RowBox[{"503.5246727089628`", " ", "deltaGEC"}], "T"]}]]}]]}], 
      "-", 
      FractionBox[
       RowBox[{"1.`", " ", 
        RowBox[{"(", 
         RowBox[{
          FractionBox[
           SuperscriptBox["\[ExponentialE]", 
            RowBox[{"-", 
             FractionBox[
              RowBox[{"503.5246727089628`", " ", "deltaGBC"}], "T"]}]], 
           RowBox[{"1.`", "\[VeryThinSpace]", "+", 
            SuperscriptBox["\[ExponentialE]", 
             RowBox[{"-", 
              FractionBox[
               RowBox[{"503.5246727089628`", " ", "deltaGBC"}], "T"]}]], "+", 
            SuperscriptBox["\[ExponentialE]", 
             RowBox[{"-", 
              FractionBox[
               RowBox[{"503.5246727089628`", " ", "deltaGEC"}], "T"]}]]}]], 
          "+", 
          FractionBox[
           SuperscriptBox["\[ExponentialE]", 
            RowBox[{"-", 
             FractionBox[
              RowBox[{"503.5246727089628`", " ", "deltaGEC"}], "T"]}]], 
           RowBox[{"1.`", "\[VeryThinSpace]", "+", 
            SuperscriptBox["\[ExponentialE]", 
             RowBox[{"-", 
              FractionBox[
               RowBox[{"503.5246727089628`", " ", "deltaGBC"}], "T"]}]], "+", 
            SuperscriptBox["\[ExponentialE]", 
             RowBox[{"-", 
              FractionBox[
               RowBox[{"503.5246727089628`", " ", "deltaGEC"}], "T"]}]]}]]}], 
         ")"}]}], "Pref"]}]]}], "]"}]}]], "Input",
 CellChangeTimes->{3.867230826426618*^9},
 CellLabel->"In[10]:=",ExpressionUUID->"1f07cca5-ba04-422f-8128-2579e30feafc"],

Cell[BoxData[
 FractionBox[
  RowBox[{"1.`", " ", 
   RowBox[{"(", 
    RowBox[{
     RowBox[{"1.`", " ", 
      SuperscriptBox["\[ExponentialE]", 
       FractionBox[
        RowBox[{"503.5246727089628`", " ", "deltaGBC"}], "T"]]}], "+", 
     RowBox[{"1.`", " ", 
      SuperscriptBox["\[ExponentialE]", 
       FractionBox[
        RowBox[{"503.5246727089628`", " ", "deltaGEC"}], "T"]]}], "+", 
     RowBox[{"1.`", " ", 
      SuperscriptBox["\[ExponentialE]", 
       FractionBox[
        RowBox[{
         RowBox[{"503.5246727089628`", " ", "deltaGBC"}], "+", 
         RowBox[{"503.5246727089628`", " ", "deltaGEC"}]}], "T"]]}]}], ")"}], 
   " ", "Kaens", " ", "Pref"}], 
  RowBox[{
   RowBox[{"1.`", " ", 
    SuperscriptBox["\[ExponentialE]", 
     FractionBox[
      RowBox[{"503.5246727089628`", " ", "deltaGBC"}], "T"]]}], "+", 
   RowBox[{"1.`", " ", 
    SuperscriptBox["\[ExponentialE]", 
     FractionBox[
      RowBox[{"503.5246727089628`", " ", "deltaGEC"}], "T"]]}], "+", 
   RowBox[{"1.`", " ", 
    SuperscriptBox["\[ExponentialE]", 
     FractionBox[
      RowBox[{
       RowBox[{"503.5246727089628`", " ", "deltaGBC"}], "+", 
       RowBox[{"503.5246727089628`", " ", "deltaGEC"}]}], "T"]], " ", 
    "Pref"}]}]]], "Output",
 CellChangeTimes->{3.8672308268210917`*^9},
 CellLabel->"Out[10]=",ExpressionUUID->"d450dfc6-b43c-4289-aa97-0e5fab457948"]
}, Open  ]]
}, Open  ]],

Cell[CellGroupData[{

Cell["\<\
Below is checking how binding of a cpmpound (drug) to integrin influences the \
population of extended integrin states (EC and EO)\
\>", "Subsubtitle",
 CellChangeTimes->{{3.668773472736165*^9, 3.6687735033362074`*^9}, 
   3.6694642318258524`*^9, {3.84763701769219*^9, 3.847637040218746*^9}, {
   3.8672302656150293`*^9, 3.867230588719453*^9}, {3.867230861343893*^9, 
   3.8672308851278763`*^9}, {3.867230916267028*^9, 3.8672309241519613`*^9}, {
   3.867231016329973*^9, 
   3.867231027544642*^9}},ExpressionUUID->"9d6d66e3-64af-47cb-8152-\
70dcd74647a1"],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"\[IndentingNewLine]", 
  RowBox[{
   RowBox[{
    RowBox[{"Ccompound", "=", 
     RowBox[{"FoldoverKd", "/", "Kaens"}]}], ";"}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"T", "=", 
     RowBox[{"22", "+", "273.15"}]}], ";"}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"deltaGEO", "=", "0"}], ";"}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"deltaGBCextrabound", "=", 
     RowBox[{"deltaGBC", "-", 
      RowBox[{"R", "*", "T", "*", 
       RowBox[{"Log", "[", 
        RowBox[{"Ccompound", "*", "KaC"}], "]"}]}]}]}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"deltaGECextrabound", "=", 
     RowBox[{"deltaGEC", "-", 
      RowBox[{"R", "*", "T", "*", 
       RowBox[{"Log", "[", 
        RowBox[{"Ccompound", "*", "KaC"}], "]"}]}]}]}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"deltaGEOextrabound", "=", 
     RowBox[{
      RowBox[{"-", "R"}], "*", "T", "*", 
      RowBox[{"Log", "[", 
       RowBox[{"Ccompound", "*", "KaEO"}], "]"}]}]}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"Qinpresenceofcompound", "=", 
     RowBox[{
      RowBox[{"Exp", "[", 
       RowBox[{"-", 
        FractionBox["deltaGBC", 
         RowBox[{"R", "*", "T"}]]}], "]"}], "+", 
      RowBox[{"Exp", "[", 
       RowBox[{"-", 
        FractionBox["deltaGEC", 
         RowBox[{"R", "*", "T"}]]}], "]"}], "+", 
      RowBox[{"Exp", "[", 
       RowBox[{"-", 
        FractionBox["deltaGEO", 
         RowBox[{"R", "*", "T"}]]}], "]"}], "+", 
      RowBox[{"Exp", "[", 
       RowBox[{"-", 
        FractionBox["deltaGBCextrabound", 
         RowBox[{"R", "*", "T"}]]}], "]"}], "+", 
      RowBox[{"Exp", "[", 
       RowBox[{"-", 
        FractionBox["deltaGECextrabound", 
         RowBox[{"R", "*", "T"}]]}], "]"}], "+", 
      RowBox[{"Exp", "[", 
       FractionBox[
        RowBox[{"-", "deltaGEOextrabound"}], 
        RowBox[{"R", "*", "T"}]], "]"}]}]}], ";"}], "\[IndentingNewLine]", 
   RowBox[{"Pextended", "=", 
    RowBox[{"FullSimplify", "[", 
     FractionBox[
      RowBox[{
       RowBox[{"Exp", "[", 
        RowBox[{"-", 
         FractionBox["deltaGEO", 
          RowBox[{"R", "*", "T"}]]}], "]"}], "+", 
       RowBox[{"Exp", "[", 
        FractionBox[
         RowBox[{"-", "deltaGEOextrabound"}], 
         RowBox[{"R", "*", "T"}]], "]"}], "+", 
       RowBox[{"Exp", "[", 
        RowBox[{"-", 
         FractionBox["deltaGEC", 
          RowBox[{"R", "*", "T"}]]}], "]"}], "+", 
       RowBox[{"Exp", "[", 
        FractionBox[
         RowBox[{"-", "deltaGECextrabound"}], 
         RowBox[{"R", "*", "T"}]], "]"}]}], "Qinpresenceofcompound"], "]"}]}],
    "\[IndentingNewLine]", "\[IndentingNewLine]"}]}]], "Input",
 CellChangeTimes->{{3.6627274249042253`*^9, 3.662727505549339*^9}, {
   3.668772805878604*^9, 3.6687728391911507`*^9}, {3.668773513533222*^9, 
   3.668773605654352*^9}, {3.668773637989145*^9, 3.6687736440894938`*^9}, 
   3.6687736951184125`*^9, {3.668773777394092*^9, 3.668773791644112*^9}, {
   3.6687738626372128`*^9, 3.668773863477214*^9}, {3.668773939633322*^9, 
   3.6687739422433257`*^9}, {3.66877403319751*^9, 3.668774078706574*^9}, {
   3.6687741531156793`*^9, 3.6687742677868423`*^9}, {3.6687742992468863`*^9, 
   3.668774336534939*^9}, {3.6687744535681047`*^9, 3.668774565656263*^9}, {
   3.668776774305666*^9, 3.66877681270722*^9}, {3.6687768473937693`*^9, 
   3.668776875536309*^9}, {3.668776977416953*^9, 3.6687770159135065`*^9}, {
   3.6687803084180717`*^9, 3.668780344247123*^9}, {3.6687836304759088`*^9, 
   3.668783731365058*^9}, 3.6687843278244033`*^9, {3.668784635222924*^9, 
   3.6687847313895607`*^9}, {3.668784910846421*^9, 3.668784911116421*^9}, {
   3.668784986951029*^9, 3.6687850133755665`*^9}, {3.668785097177695*^9, 
   3.668785111097715*^9}, {3.669463977691386*^9, 3.6694639800113897`*^9}, {
   3.6694642141438227`*^9, 3.6694644775373197`*^9}, {3.6694645081053705`*^9, 
   3.6694646564896336`*^9}, {3.6694646975257*^9, 3.6694650377632685`*^9}, {
   3.6694651665234766`*^9, 3.6694651980855303`*^9}, {3.6694659845443316`*^9, 
   3.669466028731407*^9}, {3.669466998634079*^9, 3.669467069171194*^9}, {
   3.669545517290757*^9, 3.669545544972804*^9}, {3.6695455787228575`*^9, 
   3.6695455965128884`*^9}, {3.847635712980685*^9, 3.847635889371207*^9}, {
   3.847636129134025*^9, 3.847636136136712*^9}, {3.847636292873021*^9, 
   3.847636394811759*^9}, {3.847636719414431*^9, 3.8476367316051064`*^9}, {
   3.847636771820341*^9, 3.847636828960597*^9}, {3.847637745126831*^9, 
   3.847637761619997*^9}, {3.847637829219715*^9, 3.847637892159253*^9}, {
   3.867230782624704*^9, 3.867230815627952*^9}, {3.867230934361104*^9, 
   3.867231003890033*^9}},
 CellLabel->"In[11]:=",ExpressionUUID->"a51e67d1-de87-466a-a050-ca2f14c87ca5"],

Cell[BoxData[
 RowBox[{
  RowBox[{"(", 
   RowBox[{
    SuperscriptBox["\[ExponentialE]", 
     RowBox[{"1.7059958418057355`", " ", "deltaGBC"}]], " ", 
    RowBox[{"(", 
     RowBox[{
      RowBox[{
       SuperscriptBox["\[ExponentialE]", 
        RowBox[{"1.7059958418057353`", " ", "deltaGEC"}]], " ", 
       RowBox[{"(", 
        RowBox[{"1.`", "\[VeryThinSpace]", "+", 
         RowBox[{"1.`", " ", "FoldoverKd"}]}], ")"}]}], "+", 
      RowBox[{
       SuperscriptBox["\[ExponentialE]", 
        RowBox[{"3.4119916836114705`", " ", "deltaGEC"}]], " ", 
       RowBox[{"(", 
        RowBox[{"1.`", "\[VeryThinSpace]", "+", 
         RowBox[{"1.`", " ", "FoldoverKd", " ", "Pref"}]}], ")"}]}], "+", 
      RowBox[{
       SuperscriptBox["\[ExponentialE]", 
        RowBox[{"1.7059958418057355`", " ", "deltaGBC"}]], " ", 
       RowBox[{"(", 
        RowBox[{"1.`", "\[VeryThinSpace]", "+", 
         RowBox[{"1.`", " ", "FoldoverKd"}], "+", 
         RowBox[{
          SuperscriptBox["\[ExponentialE]", 
           RowBox[{"3.4119916836114705`", " ", "deltaGEC"}]], " ", 
          RowBox[{"(", 
           RowBox[{"1.`", "\[VeryThinSpace]", "+", 
            RowBox[{"1.`", " ", "FoldoverKd"}]}], ")"}], " ", "Pref"}], "+", 
         RowBox[{
          SuperscriptBox["\[ExponentialE]", 
           RowBox[{"1.7059958418057353`", " ", "deltaGEC"}]], " ", 
          RowBox[{"(", 
           RowBox[{"1.`", "\[VeryThinSpace]", "+", 
            RowBox[{"1.`", " ", "Pref"}], "+", 
            RowBox[{"FoldoverKd", " ", 
             RowBox[{"(", 
              RowBox[{"1.`", "\[VeryThinSpace]", "+", 
               RowBox[{"1.`", " ", "Pref"}]}], ")"}]}]}], ")"}]}]}], 
        ")"}]}]}], ")"}]}], ")"}], "/", 
  RowBox[{"(", 
   RowBox[{
    RowBox[{
     SuperscriptBox["\[ExponentialE]", 
      RowBox[{"3.411991683611471`", " ", "deltaGBC"}]], " ", 
     RowBox[{"(", 
      RowBox[{"1.`", "\[VeryThinSpace]", "+", 
       RowBox[{"1.`", " ", "FoldoverKd"}]}], ")"}]}], "+", 
    RowBox[{
     SuperscriptBox["\[ExponentialE]", 
      RowBox[{"3.4119916836114705`", " ", "deltaGEC"}]], " ", 
     RowBox[{"(", 
      RowBox[{"1.`", "\[VeryThinSpace]", "+", 
       RowBox[{"1.`", " ", "FoldoverKd"}], "+", 
       RowBox[{
        SuperscriptBox["\[ExponentialE]", 
         RowBox[{"3.411991683611471`", " ", "deltaGBC"}]], " ", 
        RowBox[{"(", 
         RowBox[{"1.`", "\[VeryThinSpace]", "+", 
          RowBox[{"1.`", " ", "FoldoverKd"}]}], ")"}], " ", "Pref"}], "+", 
       RowBox[{
        SuperscriptBox["\[ExponentialE]", 
         RowBox[{"1.7059958418057355`", " ", "deltaGBC"}]], " ", 
        RowBox[{"(", 
         RowBox[{"1.`", "\[VeryThinSpace]", "+", 
          RowBox[{"1.`", " ", "Pref"}], "+", 
          RowBox[{"FoldoverKd", " ", 
           RowBox[{"(", 
            RowBox[{"1.`", "\[VeryThinSpace]", "+", 
             RowBox[{"1.`", " ", "Pref"}]}], ")"}]}]}], ")"}]}]}], ")"}]}], 
    "+", 
    RowBox[{
     SuperscriptBox["\[ExponentialE]", 
      RowBox[{"1.7059958418057353`", " ", "deltaGEC"}]], " ", 
     RowBox[{"(", 
      RowBox[{
       RowBox[{
        SuperscriptBox["\[ExponentialE]", 
         RowBox[{"1.7059958418057355`", " ", "deltaGBC"}]], " ", 
        RowBox[{"(", 
         RowBox[{"2.`", "\[VeryThinSpace]", "+", 
          RowBox[{"2.`", " ", "FoldoverKd"}]}], ")"}]}], "+", 
       RowBox[{
        SuperscriptBox["\[ExponentialE]", 
         RowBox[{"3.411991683611471`", " ", "deltaGBC"}]], " ", 
        RowBox[{"(", 
         RowBox[{"1.`", "\[VeryThinSpace]", "+", 
          RowBox[{"1.`", " ", "Pref"}], "+", 
          RowBox[{"FoldoverKd", " ", 
           RowBox[{"(", 
            RowBox[{"1.`", "\[VeryThinSpace]", "+", 
             RowBox[{"1.`", " ", "Pref"}]}], ")"}]}]}], ")"}]}]}], ")"}]}]}], 
   ")"}]}]], "Output",
 CellChangeTimes->{
  3.8476359004433804`*^9, 3.847636419567768*^9, {3.847636818161087*^9, 
   3.847636829687735*^9}, 3.8476378952132187`*^9, 3.8672310423754663`*^9},
 CellLabel->"Out[18]=",ExpressionUUID->"e170f713-68e2-42fa-8a9f-f98e2cca98f8"]
}, Open  ]],

Cell[BoxData[""], "Input",
 CellChangeTimes->{{3.668774573786274*^9, 3.668774616192334*^9}, {
  3.6687843110843782`*^9, 
  3.6687843128443804`*^9}},ExpressionUUID->"be49b56b-b4fe-44bd-a048-\
0da2cfb0e400"],

Cell[BoxData[
 RowBox[{
  RowBox[{
   RowBox[{"ProbabilityE", "[", 
    RowBox[{"deltaGBC_", ",", "deltaGEC_", ",", "Pref_", ",", "FoldoverKd_"}],
     "]"}], ":=", 
   RowBox[{
    RowBox[{"(", 
     RowBox[{
      SuperscriptBox["\[ExponentialE]", 
       RowBox[{"1.7059958418057355`", " ", "deltaGBC"}]], " ", 
      RowBox[{"(", 
       RowBox[{
        RowBox[{
         SuperscriptBox["\[ExponentialE]", 
          RowBox[{"1.7059958418057353`", " ", "deltaGEC"}]], " ", 
         RowBox[{"(", 
          RowBox[{"1.`", "\[VeryThinSpace]", "+", 
           RowBox[{"1.`", " ", "FoldoverKd"}]}], ")"}]}], "+", 
        RowBox[{
         SuperscriptBox["\[ExponentialE]", 
          RowBox[{"3.4119916836114705`", " ", "deltaGEC"}]], " ", 
         RowBox[{"(", 
          RowBox[{"1.`", "\[VeryThinSpace]", "+", 
           RowBox[{"1.`", " ", "FoldoverKd", " ", "Pref"}]}], ")"}]}], "+", 
        RowBox[{
         SuperscriptBox["\[ExponentialE]", 
          RowBox[{"1.7059958418057355`", " ", "deltaGBC"}]], " ", 
         RowBox[{"(", 
          RowBox[{"1.`", "\[VeryThinSpace]", "+", 
           RowBox[{"1.`", " ", "FoldoverKd"}], "+", 
           RowBox[{
            SuperscriptBox["\[ExponentialE]", 
             RowBox[{"3.4119916836114705`", " ", "deltaGEC"}]], " ", 
            RowBox[{"(", 
             RowBox[{"1.`", "\[VeryThinSpace]", "+", 
              RowBox[{"1.`", " ", "FoldoverKd"}]}], ")"}], " ", "Pref"}], "+", 
           RowBox[{
            SuperscriptBox["\[ExponentialE]", 
             RowBox[{"1.7059958418057353`", " ", "deltaGEC"}]], " ", 
            RowBox[{"(", 
             RowBox[{"1.`", "\[VeryThinSpace]", "+", 
              RowBox[{"1.`", " ", "Pref"}], "+", 
              RowBox[{"FoldoverKd", " ", 
               RowBox[{"(", 
                RowBox[{"1.`", "\[VeryThinSpace]", "+", 
                 RowBox[{"1.`", " ", "Pref"}]}], ")"}]}]}], ")"}]}]}], 
          ")"}]}]}], ")"}]}], ")"}], "/", 
    RowBox[{"(", 
     RowBox[{
      RowBox[{
       SuperscriptBox["\[ExponentialE]", 
        RowBox[{"3.411991683611471`", " ", "deltaGBC"}]], " ", 
       RowBox[{"(", 
        RowBox[{"1.`", "\[VeryThinSpace]", "+", 
         RowBox[{"1.`", " ", "FoldoverKd"}]}], ")"}]}], "+", 
      RowBox[{
       SuperscriptBox["\[ExponentialE]", 
        RowBox[{"3.4119916836114705`", " ", "deltaGEC"}]], " ", 
       RowBox[{"(", 
        RowBox[{"1.`", "\[VeryThinSpace]", "+", 
         RowBox[{"1.`", " ", "FoldoverKd"}], "+", 
         RowBox[{
          SuperscriptBox["\[ExponentialE]", 
           RowBox[{"3.411991683611471`", " ", "deltaGBC"}]], " ", 
          RowBox[{"(", 
           RowBox[{"1.`", "\[VeryThinSpace]", "+", 
            RowBox[{"1.`", " ", "FoldoverKd"}]}], ")"}], " ", "Pref"}], "+", 
         RowBox[{
          SuperscriptBox["\[ExponentialE]", 
           RowBox[{"1.7059958418057355`", " ", "deltaGBC"}]], " ", 
          RowBox[{"(", 
           RowBox[{"1.`", "\[VeryThinSpace]", "+", 
            RowBox[{"1.`", " ", "Pref"}], "+", 
            RowBox[{"FoldoverKd", " ", 
             RowBox[{"(", 
              RowBox[{"1.`", "\[VeryThinSpace]", "+", 
               RowBox[{"1.`", " ", "Pref"}]}], ")"}]}]}], ")"}]}]}], ")"}]}], 
      "+", 
      RowBox[{
       SuperscriptBox["\[ExponentialE]", 
        RowBox[{"1.7059958418057353`", " ", "deltaGEC"}]], " ", 
       RowBox[{"(", 
        RowBox[{
         RowBox[{
          SuperscriptBox["\[ExponentialE]", 
           RowBox[{"1.7059958418057355`", " ", "deltaGBC"}]], " ", 
          RowBox[{"(", 
           RowBox[{"2.`", "\[VeryThinSpace]", "+", 
            RowBox[{"2.`", " ", "FoldoverKd"}]}], ")"}]}], "+", 
         RowBox[{
          SuperscriptBox["\[ExponentialE]", 
           RowBox[{"3.411991683611471`", " ", "deltaGBC"}]], " ", 
          RowBox[{"(", 
           RowBox[{"1.`", "\[VeryThinSpace]", "+", 
            RowBox[{"1.`", " ", "Pref"}], "+", 
            RowBox[{"FoldoverKd", " ", 
             RowBox[{"(", 
              RowBox[{"1.`", "\[VeryThinSpace]", "+", 
               RowBox[{"1.`", " ", "Pref"}]}], ")"}]}]}], ")"}]}]}], 
        ")"}]}]}], ")"}]}]}], "\[IndentingNewLine]"}]], "Input",
 CellChangeTimes->{{3.6627294269921885`*^9, 3.662729443922212*^9}, 
   3.6628128999807997`*^9, 3.6687750289699326`*^9, 3.6687768936503344`*^9, 
   3.668777033751032*^9, 3.6687803568671403`*^9, {3.6687837785511255`*^9, 
   3.6687837971411514`*^9}, 3.668784216221243*^9, 3.6687843423944235`*^9, 
   3.668784747123583*^9, 3.6687850252755833`*^9, 3.668785120697728*^9, 
   3.668791965448696*^9, 3.668793045964362*^9, 3.669465261628642*^9, {
   3.669465440633936*^9, 3.669465485875008*^9}, 3.6694660416374283`*^9, {
   3.669467077011205*^9, 3.669467121968279*^9}, {3.669545614116918*^9, 
   3.66954564827997*^9}, {3.8476364725327*^9, 3.847636570078516*^9}, {
   3.8476368538673487`*^9, 3.8476368938895273`*^9}, 3.8476379063678513`*^9, {
   3.867231063714649*^9, 3.867231065276124*^9}},
 CellLabel->"In[19]:=",ExpressionUUID->"c37e7538-ece4-474a-aa16-6922a6fe0170"],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{
  RowBox[{"SetDirectory", "[", 
   RowBox[{"NotebookDirectory", "[", "]"}], "]"}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{"LogLinearPlot", "[", 
  RowBox[{
   RowBox[{"{", 
    RowBox[{
     RowBox[{"ProbabilityE", "[", 
      RowBox[{
       RowBox[{"-", "4"}], ",", 
       RowBox[{"-", "1.8"}], ",", "Pref", ",", "100"}], "]"}], ",", 
     RowBox[{"ProbabilityE", "[", 
      RowBox[{
       RowBox[{"-", "4"}], ",", 
       RowBox[{"-", "1.8"}], ",", "Pref", ",", "0"}], "]"}], ",", 
     RowBox[{"ProbabilityE", "[", 
      RowBox[{
       RowBox[{"-", "1.2"}], ",", "1.0", ",", "Pref", ",", "100"}], "]"}], 
     ",", 
     RowBox[{"ProbabilityE", "[", 
      RowBox[{
       RowBox[{"-", "1.2"}], ",", "1.0", ",", "Pref", ",", "0"}], "]"}]}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"Pref", ",", "0.01", ",", "1000"}], "}"}], ",", 
   RowBox[{"PlotRange", "\[Rule]", 
    RowBox[{"{", 
     RowBox[{
      RowBox[{"-", "0.05"}], ",", "1.05"}], "}"}]}], ",", 
   RowBox[{"Frame", "\[Rule]", "True"}], ",", 
   RowBox[{"FrameLabel", "\[Rule]", 
    RowBox[{"{", 
     RowBox[{
     "\"\<Affinity fold difference to EO and C\>\"", ",", 
      "\"\<Pextended \>\"", ",", "\"\<\>\"", ",", "\"\<\>\""}], "}"}]}], ",", 
   RowBox[{"FrameStyle", "\[Rule]", 
    RowBox[{"{", 
     RowBox[{
      RowBox[{"{", 
       RowBox[{
        RowBox[{"Directive", "[", 
         RowBox[{"Black", ",", "50"}], "]"}], ",", 
        RowBox[{"Thickness", "[", "0.005", "]"}]}], "}"}], ",", 
      RowBox[{"{", 
       RowBox[{
        RowBox[{"Directive", "[", 
         RowBox[{"Black", ",", "50"}], "]"}], ",", 
        RowBox[{"Thickness", "[", "0.005", "]"}]}], "}"}], ",", 
      RowBox[{"{", 
       RowBox[{
        RowBox[{"Directive", "[", 
         RowBox[{"White", ",", "50"}], "]"}], ",", 
        RowBox[{"Thickness", "[", "0", "]"}]}], "}"}], ",", 
      RowBox[{"{", 
       RowBox[{
        RowBox[{"Directive", "[", 
         RowBox[{"White", ",", "50"}], "]"}], ",", 
        RowBox[{"Thickness", "[", "0", "]"}]}], "}"}]}], "}"}]}], ",", 
   RowBox[{"PlotStyle", "\[Rule]", 
    RowBox[{"{", 
     RowBox[{
      RowBox[{"{", 
       RowBox[{"Black", ",", 
        RowBox[{"Thickness", "[", "0.006", "]"}]}], "}"}], ",", 
      RowBox[{"{", 
       RowBox[{"Black", ",", "Dashed", ",", 
        RowBox[{"Thickness", "[", "0.006", "]"}]}], "}"}], ",", 
      RowBox[{"{", 
       RowBox[{"Blue", ",", 
        RowBox[{"Thickness", "[", "0.006", "]"}]}], "}"}], ",", 
      RowBox[{"{", 
       RowBox[{"Blue", ",", "Dashed", ",", 
        RowBox[{"Thickness", "[", "0.006", "]"}]}], "}"}], ",", 
      RowBox[{"{", 
       RowBox[{"Green", ",", 
        RowBox[{"Thickness", "[", "0.006", "]"}]}], "}"}], ",", 
      RowBox[{"{", 
       RowBox[{"Green", ",", "Dashed", ",", 
        RowBox[{"Thickness", "[", "0.006", "]"}]}], "}"}]}], "}"}]}], ",", 
   RowBox[{"AspectRatio", "\[Rule]", "1"}], ",", 
   RowBox[{"FrameTicks", "\[Rule]", 
    RowBox[{"{", 
     RowBox[{
      RowBox[{"{", 
       RowBox[{
        RowBox[{"{", 
         RowBox[{"0.0001", ",", "\"\<0.0001\>\"", ",", 
          RowBox[{"{", 
           RowBox[{".03", ",", "0"}], "}"}]}], "}"}], ",", 
        RowBox[{"{", 
         RowBox[{"0.001", ",", "\"\<0.001\>\"", ",", 
          RowBox[{"{", 
           RowBox[{".03", ",", "0"}], "}"}]}], "}"}], ",", 
        RowBox[{"{", 
         RowBox[{"0.01", ",", "\"\<0.01\>\"", ",", 
          RowBox[{"{", 
           RowBox[{".03", ",", "0"}], "}"}]}], "}"}], ",", 
        RowBox[{"{", 
         RowBox[{"0.1", ",", "\"\<0.1\>\"", ",", 
          RowBox[{"{", 
           RowBox[{".03", ",", "0"}], "}"}]}], "}"}], ",", 
        RowBox[{"{", 
         RowBox[{"1", ",", "\"\<1\>\"", ",", 
          RowBox[{"{", 
           RowBox[{".03", ",", "0"}], "}"}]}], "}"}], ",", 
        RowBox[{"{", 
         RowBox[{"10", ",", "\"\<10\>\"", ",", 
          RowBox[{"{", 
           RowBox[{".03", ",", "0"}], "}"}]}], "}"}], ",", 
        RowBox[{"{", 
         RowBox[{"100", ",", "\"\<100\>\"", ",", 
          RowBox[{"{", 
           RowBox[{".03", ",", "0"}], "}"}]}], "}"}], ",", 
        RowBox[{"{", 
         RowBox[{"1000", ",", "\"\<1000\>\"", ",", 
          RowBox[{"{", 
           RowBox[{".03", ",", "0"}], "}"}]}], "}"}], ",", 
        RowBox[{"{", 
         RowBox[{"10000", ",", "\"\<10000\>\"", ",", 
          RowBox[{"{", 
           RowBox[{".03", ",", "0"}], "}"}]}], "}"}]}], "}"}], ",", 
      RowBox[{"{", 
       RowBox[{
        RowBox[{"{", 
         RowBox[{"0.2", ",", "\"\<0.2\>\"", ",", 
          RowBox[{"{", 
           RowBox[{".03", ",", "0"}], "}"}]}], "}"}], ",", 
        RowBox[{"{", 
         RowBox[{"0.4", ",", "\"\<0.4\>\"", ",", 
          RowBox[{"{", 
           RowBox[{".03", ",", "0"}], "}"}]}], "}"}], ",", 
        RowBox[{"{", 
         RowBox[{"0.6", ",", "\"\<0.6\>\"", ",", 
          RowBox[{"{", 
           RowBox[{".03", ",", "0"}], "}"}]}], "}"}], ",", 
        RowBox[{"{", 
         RowBox[{"0.8", ",", "\"\<0.8\>\"", ",", 
          RowBox[{"{", 
           RowBox[{".03", ",", "0"}], "}"}]}], "}"}], ",", 
        RowBox[{"{", 
         RowBox[{"1", ",", "\"\<1.0\>\"", ",", 
          RowBox[{"{", 
           RowBox[{".03", ",", "0"}], "}"}]}], "}"}], ",", 
        RowBox[{"{", 
         RowBox[{"0", ",", "\"\<0\>\"", ",", 
          RowBox[{"{", 
           RowBox[{".03", ",", "0"}], "}"}]}], "}"}]}], "}"}], ",", 
      RowBox[{"{", "}"}], ",", 
      RowBox[{"{", "}"}]}], "}"}]}]}], "]"}]}], "Input",
 CellChangeTimes->{{3.847638672081575*^9, 3.8476387461360483`*^9}, {
   3.847638843798398*^9, 3.847638851941564*^9}, {3.847638906014717*^9, 
   3.847638922097207*^9}, {3.847639200426839*^9, 3.847639202044029*^9}, 
   3.847639271518859*^9, {3.847639392880134*^9, 3.8476393974293213`*^9}, {
   3.847724767340322*^9, 3.84772484980995*^9}, {3.847724887266452*^9, 
   3.8477249904562473`*^9}, {3.849197264868634*^9, 3.849197320044145*^9}, {
   3.849197545371812*^9, 3.849197566024646*^9}, {3.849197617873187*^9, 
   3.849197621231648*^9}, {3.8505626507176847`*^9, 3.850562770303631*^9}, {
   3.8505665322098017`*^9, 3.850566578638466*^9}, {3.8505666114711514`*^9, 
   3.850566616254915*^9}, {3.857472491340045*^9, 3.8574724919599743`*^9}, {
   3.85747532099179*^9, 3.8574755017677813`*^9}, 3.857475734158616*^9, {
   3.857476193337544*^9, 3.8574762076493*^9}, {3.857476714191527*^9, 
   3.8574767830718117`*^9}, 3.857477339312779*^9, {3.857477488817697*^9, 
   3.857477491912631*^9}, {3.867231083989737*^9, 3.867231146499093*^9}, {
   3.8672311798931417`*^9, 3.8672311841468477`*^9}},
 CellLabel->"In[26]:=",ExpressionUUID->"b76600ae-7e2b-4bb5-82ed-140cf50aa719"],

Cell[BoxData[
 GraphicsBox[{{{}, {}, 
    TagBox[
     {GrayLevel[0], Thickness[0.006], Opacity[1.], LineBox[CompressedData["
1:eJwV1nc8V+8XAHB7r4+s7JQyMksZcW6KsosyilIZRSIZkb2KiFQ+H3uPMkOi
4t7spEJCZWWFfIXs+Xt+f93X+/W693nO6zznnOfuuepqak9DRUX1hJqK6v/P
i21zhS+duYl9jwL20vmS4SRvCCvPdW7Ccnr3UwZkedtdzl523ITEwDQDMzLN
soqMhg030f1A5R878os99woajbmJhVt5E/zI63fpc3uVuAk/RUL9IDLlgGDa
1gqJmGQIyzNHDnEv3Lq8SCLc/XquWCHfrD1mUz9HIhYUssSskTGzy8L3p0jE
ndMlWVeQJwNykrh+kohnXn3NN5GP9siT99aRiNzjnpGhyD1hJ+L0wkiEQb82
UwWy22UqnktBJMKjWNWqCplFvZbs7kci+uncimuQtf4eSU/2IBGz3GWXCeQ8
K5mS/+xIxOHFL38+IXvLk9of65AI6VDn3Clkgb5Bxh8MJEKCNfvV3ntkKC9P
fjhLQyJcqtU8DyAbxlhy0u5wEWyRAaqyyEHaXXwHV7iIt6x72pSRJ4uaJAN+
cxGeWQqC2sg1wUUnJFq5iC2dUrcryBdkfQOdIrmIA29/krKRfYsZQ9+HcxFy
Bn4M+cjJCs8iBEK4iEnO2u0XyP2HymKafbmIsvCD6+XINscmkiVuchHn5sVF
GpBtjUyrfxhzEaJ2lnxjyI6uMvP6PCie2JuzUn4oHodXTeZanMRu6gu0OHL+
jmWs9FFOQunWsdEGZAfKpuWmAiehpRrU0oo8+uHETOYe5FyN1C7kwYNd3P/R
cRLfV+b8J5C/LsxeDv3IQTyc/c7P6U+GugCp9VJLDuKPXGTbNWR//vaGkLMc
hF67v9YN5GNlrjHn9TmI392Wr28h1/yqEt/Q4CAimr6+9kGuPKlzSleMg+B3
tFqMRX7BcvVp/zg7YT8bf7kW+VlCsjzzHXZCOI5LTDgAvW+cgGHO7MTF1pO1
EshfGR6bel9jJ6rKZ65II5O8I7zGzdiJkPayuiPIMRa3694fZidaKt82n0UO
Fzhl7LvMRrS0+fNFInsmLbj88WEjaB6wj24in0/TK/4UxEq0WknUrAei880d
r4v0YSWOF95NpAkiQ1FRcIeOOyvBqr8WxIJM97bmX+01VuLb/Sf2gsjlvdLq
JbqshM3GaLg6MheJpeURGytxSa1Vyg/5Y2jbsAmFhRgn/A7QB5NhOcphgfUx
C1EXeGidHVkinoauNZKF0GSY7+ZD9s1QP4DdYyEsc1OzpJClal+4KF5iIZq1
HqYbIkcsR61z7WMhbJ5o7U9APn7DgKerlJngks9NUQghQ3us1q2FfGbiwlNh
M3VkyyqlVu4MZoKRbx+PDrIbrYCfWRwzsSnCXnUBOSN1bLTbjZn4ftXFNwKZ
qsu/olcJrcf1hmMYmVAvMx2oYCL2+5iUJ4eifriSXbRVyEScsmr8ko/cdz+B
QTSHidg8IbtWgTzX7ffm0lMmIth227UdWdxVT2LYg4nYbc7wdws5KHtkfkSF
ieD9I6V5LQzNAzbex5OvGQnnwTi3o+Fk0G+JK5YrYySO5EyNnkQ+F8LW5l7A
SHjcO2Vninx9lZZ2i8JI6HSdjHZBjh1b8CD5MhL7N5775iAPvuuwVD/GSHwt
se/niSCDn0u0eDTBQEhL3uWiuk+G6s+0ZQof6AlFLXMj2kgyfO4Tb197T098
8dLU3YU8PqI52fCGnphnjTPai8y94i1uWURPRDgW3j+BfFNsJi4olp5QVZcp
DEPe49Z9u/M8PWEqMv2GOYoMUaTcQ3dG6AhnGmobsYcov0L1Jpo/6QgLFk9N
JeTXkkPOjN10BEsom/wJ5DG13TnJTXSEucAwOCJrXY3haSygI6zmKg+UIf8r
91zicaUj/FkEeXWiyWB9Tvd11QYtUWHf0HkvBvWD/xuh8X+0xE2ljrDHyPr5
8kG7ZmiJ7HQho3xk1XU+Pbd+WuJj3nuRr8i7Mn7/kK6lJQJKnr2XfUSGtj8P
tlMCaAnt+Q3JX8iqoR91QqlpCXl71g3rOPR++ZluE0YaYtjQcSr1CRkSZBxU
aaloCLqQsKbXyILZ91KqVqkJicsnajqRJZ7m2YlMUxNuwZu/6Z+SQdFrc3G6
nZrw/lhr54psqF7AGxFPTezR/zCr+4wMYfU75u9EqImj/SmjTGTUH10l36UO
UxE3vyg8HEgiw+qQIRW1HBVh5CV0bQt5bWZ6/3dJKkLqYoyFSDIZNhkOeETy
UxGEhFOCDTKtl5ZI99IOPhvZd2sIWVBX7L556A7u1H8xczKFDKcnhi9cTNvG
GZ3dW0npZDCgEilgjdvGK9md7FSQjQWtlt4Gb+MbqqfErZDPGXfGCttv484h
+1YzkC9XvW8ckN3GS2fiZJUzyOAVkSVvW7OFY4lVby5kkiFnvx2Nffcm/udN
h0FTNqrXQOPhgcZN/Me9zeA5ZNk+1TrzV5s4xEmNCOWg+RHJ7ns6YRMfE5Dc
cweZmKmal7XcxE/uVUzbm4vug3LmXws/N/AoOr6a6Dx0HlCKB42u4zXa3WlB
z9F9a7Hul7KwiuedDxFZK0XxGR+4IDa2iv9y+hhwsAzNY51zR7O+reJnDhVy
2CIvK5fM51ev4qHTvW9akG9wXHWoCFjFt0pj9BJfkuFM0weTNpZVXPvnAQed
CjKIHEqUWJVYwclX9nbVV6H7X7p5x5dnBV8qYLm4idwj/q9/i34FP5IsLHDk
NRniOIzItFPLuHWTv8ILZLppKjbO0mV81tu572k1GaYzri9JaizjaiIqmh5v
UD9yqLaamS3hf95mFVvXkcH85K4j6SeWcH3y6Ygs5H8+s9nTh5bwwcRn2ZPI
8uM5gcE8S7is0KFiTxzl+y3paOm3RTy4cYb2CYHmwfU/uSyWi7gba+3Gj3p0
39Wnhb63/of/KqJlyGpB8az6zLMZ/cPb2G035pAz5c5fttT8h1ttmGthrSjf
FFaNvyL/8KlCnZIhZFPXuwvCQwt4u2CslkQbGTSFTa/cvbKAzwDJvqqdDDxe
9KDgMI8v8BMbwl1kKO6eV2o0n8fnpU2SPZB1Dw3uszo1j6eqOsa2I/vMVbGE
Ss3ju8h3vfy/onnldL2nZ3oOd88Q0RvtJkPB5Y8uAa5z+EyerR7ei+orXkIt
eX4WT3Oi5Xg7QIYmVfXFXr4/OIMEXci3aTLIKFP6eNen8UjS5h3NPyj/ssvv
zAam8dZz7g25yBdEy8O/ZE/jUUoyft4zZJilleFvUZzGZwxYLonNov+fL7vV
q/SncG6FdPngeTTf7NcCnwb8xm90vnWOXSVD5yULu64rv/GSaLEq2jUyHLF8
dZpL5zfeeW73jbvI1Aa3SdGsv/FxtVMs19bRfFCcygqlTOCjApMnNDdRPW/0
NbmXj+Onqw9P0lNRYFd8NevZiVGc/jwlb5qRAutMd0jiLaO4Ykx4izcTBYYD
5fj/5o/iKuYi7vTMFChyyZKIuTGKO+XZO0iwUEBXL1rtw8wIrq8s+eMqGwV8
qWwdj//7hWdrujtsc6HvbzE2KFEN45TEvNlsQQpYkYsW9x3uw+1Oc975oECB
6C3Zrem1Xjx9jfvObUUK1F0rpH+J9+IG4husgkoUkFB8wadp0Iszs+eyuChT
YKY1X/X81R78MFGmL6hCgYD1LL/wuG7cNvvb2Xh1CmTZJNJNzHTgjzNi7m7q
UKC7QYC9qLwDL2MVKKrWpQCDDIXX/W4HPv/8V5TnKQo4Lyfs36btwEWMMg3n
T1Pghqj044NHPuN2VavzcwYUeBQstjsmvg1/Zk0yIZlSoO8Um7SxQQP+R07m
w49LFNBm8cdFP9XjqotHTuKXKVDY/t/5v8b1eFRMREaOLYrv7JeQONP3OEOL
PZX7VZSvqn01uRV1+PgsxZPfgQI/+xXFSzuq8A/3DDZjXCjAV7CvhlE2BXeq
YB1Q8KeA7dsXN6PVKLhKwU8t5QC0/mdFcdLpp7hGqlW6SiAFgqd9OFTaHuBN
Ifq2EEyBgpnz558xOEPdStbWpXAKZJA075t7ZYLLLa+ILzEUyNWI8BQIroZC
ZWD0T0f7HYhfGbxbAzwMLSPJGRSI4E7zyXV7A18vdn19m0mB61Ov/JVt38Hr
6ez17WwKJHxc0M4TIyAmsfZufAE6Tx8JA2K7AWJa/Pb/fUmBoe7gi4vvPgK1
0qPNiCYKLOuIa5WkfAMPL4VPt+co4NJK+eXd8w2u8y1cb56nwJg+Kfw4Vw/o
vh86KvyPAp0mNO3doT3weSTmzsclVG9WY1YbTr2gppAfpLpBgSsuBZ6n1b6D
6aX4SSOGRGh/qlg88q0fWvjGv7uIJMIJ/udnijgHgHHxFP0f0UR4k7hn0VNv
AITj9B/cEE+E/DRuDebaARCgp01y2psIIQWLrQo5g9BircfhL50Iwpes3bXU
hoG3lM54TCUROm+LP3rIOAIFZg9pm0wSIVolSGto/wgsKTI9fHI2EXTXhmaV
dUegqNCv55oZ2i8o3eRH2AikMMsTzBaJkBUrSpKmGQX6QnVO50uJ4FEs/LR5
cxRAplky3CUR+KYEkqgXxkGk9enA3phEuGhLyvPun4JXWk3FXl2JMPL7j8Xr
tSko3KbJSu1OBCfXZuYVvmlYiTOLbu5JhLsB91y8zk7DEVZDfdGfiZCQMn7Y
s3kaeA+2p46PJkJXX02De9kfYJuaVPu2lAinz1795RL2H4RM+5zTEUoCwUwr
DuWEOYi5f1mu92YSjLxVufogZw6klD3E/F2T4EUPqWqwfA4c3VxvSbongTpb
m83DL3Nw8KS/rL93ElzwVi8eY5oH5VI+G72QJEg0EjIk35uHIuXL/uaUJBBY
74/ctF2AiqgtDrPmJBjmqRkwdV2AVOGyztMfkqBA4ZnSc/8FyO2jUz3engSq
9kbfzyctAIlnblWtKwksOmqlSr8uwMEDeIzBYBIk5KW1XNH9B5KpCbvnl5OA
18yWvkV2EVxrPvw0l0kGYYVHrec0FqEhvfD9f3LJsI/13cMR/UU4HtAu9kAp
GZQb+Lm3byxCdKyoaYtqMpw59EVUpWARmJI3Z1xPJUPULi3V7H1LQC85sHTT
PhmouoWcA0WWIdfQolM+Jxmmz/V2HOVchQDuvNYMuRToi69/+lZkFbwEpjpG
lVKguaPYEg6uQoexcqnMkRTIMgwb1tVbhef+9zcatFLgwkmlufOhq+DJWHVI
8kwKfDj0kNNjZRVyzfsVcu+kQAE3GJcNrYFApZ5jZW0KJJyR4T48uwbfKn1Z
fepTIOwRb8/rzTWQsuFbO96SArYsMzb47nV4ZdeBD3ekgABNostns3U4Xd3v
YDqWAg/mF6JnWtZhia8lhJktFRw78j5KlW3AzG/jXyOXUuHpl9HtUXwDnnXN
UBXapUL9Z3Hl9C8bMM8v9v6uUyoIf0qi8P7dgB/Xp1QlvVKh68Mjexr5TbBe
/ZxWH5MKxxq8dn4WbgJDY7QgT10qcFfpHorN34KpIalktb1pgL0KddB/vQXE
iFExIZ0GLpVEIn3LFrTEm/AbK6ZBa7k6ld/EFtze0GL100wD/1L5T9clt+Fv
j72opGUaTBbwOWpnb4PSGccrLx+lQV3yRNJS2g7037jPMkSVDnO3ufUcS3bg
dnrFF0GmdJA4rbXSV7sD7TM6d2040yF88ZnZu/4dWOfwilkRSYe8PImI4+xU
WAmXVkCgRjrc3OnUYjKgwlwlK7TGvNNhtUyx7FkzFUY0W2UrLqcDN89sfFkt
NdaYb+WtHJ4BomVXncYaqbFdLXs4fCIzQMaw97hAOzWW4z53syEmA7TDiLnA
H9QYTTMeey0hA+4sxhubrFBjJiFPmjvzM6C7+yjLrCINpqgXPH79YwYkPAsO
ls2hweZ+HBlK5M2E3fy8bnlRtBid9D3qjqpMaHyivOMZT4sJxR7OIb/LBDeu
M490kmixxesHP9rVZ0Ir88Oisee0WLjhtTecnzPh7ibVlMQHWuziubqSgvFM
6Pk1cyWdkQ7ruVMa9oc3C54UNZpRwuiwWH29iB++WcCu7XE0KoAeY5gyr0+y
yIYi17nm7nB6bBAvHLp9KRsMU2+ai8XQY8HRt1lM7LMhatXOszKZHgtdZU8V
upMNDKXnKwar6TELqezT24+yYUfoqMKhf/RY9uMKi9mWbJhfWtvf78iAyS4Y
H0jXyoFvzwP55M8yYiff2rgGYbmwrH1n1MySEQOlcbufp3NBoN+hzOcyI6bX
PRSleTYXLnAY6ze5MGL0azOB/FdzYdBdOMA6ihErK336SiIsFyY1asajGhix
+xdOkJM/5MLmp4XK3ypMmLTTcTvtC3mwb8HeLFOQGZtanlhrf5IP4840fVcl
mLHeNEoAY3o+5I2nWe+TYcYo/OL2hi/yQep7r32+GjP2JUbUb4nIh4OE3t1i
S2Ys2dehq2k2Hw49kkutSWDGJt591HA0LABtmaWJTm4WbPzeV4u/nM/B9mqY
Lw0rK9Y9RusDb14AT0zgjhY3K/Y29M3+my0voPW1b9i93azYjlkaS073C1Bi
v/1o8QArVr0dQ1H5+wJoqm2yJk6yYjmvaluG9xVCDvvRtrYAVqxjr7f15fhC
mKye2v1kgRWrPPVlVNOrCNw4TWr2/mDDeli8oinXSqBR8N/Sxi82zOlz7wUN
zxIQ2E9W7p5iw07UTxycjSgB4thQYdgaG8avq0MKe1ECXE6uaeMC7BiTq+9Z
94USKG2MDc23YMcMNDYD7cJLYdanw0j2GztWJ3dqbudiGbiMnR1R7uDA8l7f
6KY8fwmVGefEIno5MJpjFi4TFS9h09rC+vsgB8Y+zBF/rO4lRH2z7gn8jwOb
nOag0Hx9CQXNjm3tLJyYe+j1U8ubL2GkwL/cQYcTMyrubA42LQdzl+chSW84
sVxH24fmdBUgdi+IFGzKhd3FuOKdwyqBLrbWWMCcC3t6PUS+I64SJrPWH5Za
cWH3TNpTtFIrobzNg2HQlgs7nBvFrFZVCScFb2you3JhVcU1gzmTleBUc3Z8
8SEX1rIWaXnJ5BVUrkjUXG/iwvwCFbkf7KsCfY8m2zOqJMyxqOGx+t/XELDa
46NyjIRxr7UUxO28hgq/yXhBjISxrF6zWuSsBuFw1qaxUyRsQk6laEyxGmaf
nZX2sSBhzrYBgk53qiH+9cB8phcJy/IUPMS1UQ0/15dC/lWSsIVvdNEsvG/g
ZvD+3AQlbizjAnmn2fMdCF5y1FJT4caC3OdbvR68g1b1gt6fqtwYzYyw9+Hk
dyC5KM2yB+PGlFlHM74T72DQQc610JgbWxhkoG1nqwUTw8NqhDM3ZjZO32qR
XwvK/NqfpnK5sTi6Mx7Hf9fBapHN0jHBXZics3obfRsBy2vuTnKiuzCejPwO
qR4CFnUfDIlI7MLIZ66InR8hYG64/MO29C7s1/HnBR/WCZjkYUoj1HZhU+Yl
sxIH30OfX7nuSatdWAHNsWtJce+hxpCRYkDZhT2MET9ba1sPvjNl6hf4eDDe
z5Fxn0QbQe1vsLGqIA8Wqm2hKSHXCKvzplf5RHmwS1mTM0EajeC1shjZJcmD
RYxYX7O2bIQ7NGrf9VV4sJt8H3ij4xvhpsB7b41zPNjypnNjJ1MT2JzsrBSO
58GS1I2WOLaaAEuZlx9i58V6pauF6Olbwc2JSaFxkRd7UfeVj+dEOyQYauwT
/8uHeRjNX3zQ1AH7jU5K9vfxY8631LNro7/Ceq36t51aAWxWU/FLeFQPNGob
+SZV7cYeyLvP1jP9gNVxFdlnaYKYN+mX47zHABw+VkaVmSWIHZs2KPIMGwC3
eJmeojxBLOIRh9PGkwH4rSUW3FgiiFFX5SmzVgxAD5mp91+dIPb3V5eoxvwA
VOr9DDEdEsR8pwdjv7kMgmtx0A9OcSHs/FZnfa3jELyg3SgV2ieEjWsfpL/q
PQQTVp7hB6SEsHXZvkaG+0NwicFJERSFsAs2R1LO5g2B4WWziFuYEPb5/vmP
f8aGQIa0X/mTrRBWlJz8jFdpGBwcMxi/2wlh9rdS30+pDkNWreDA2HUhTDdY
d6YWG4bdTpwPNt3Q/hsP5BzODANTw+qAbLAQ9ute8d9XrsNwcvediqPhQhj7
y5aMSO9hCHL978GJSCGsTCVY0SZwGFaERg5dfCyEFS93/qSNHQZld2tmx2dC
GPXQjb89CcNwq7Vn0D1RCOMNzOp8njYML0TPVgakCmHLAv4BfnnDMOHxMTIq
Uwhrurgxb1wyDP8DI2o0Fg==
       "]]},
     Annotation[#, "Charting`Private`Tag$69872#1"]& ], 
    TagBox[
     {GrayLevel[0], Thickness[0.006], Opacity[1.], Dashing[{Small, Small}], 
      LineBox[CompressedData["
1:eJxTTMoPSmViYGAwBWIQHX3qw+qN2UIHnjvVdVa3zLD/VcG69Lqh0IFnUP4M
dal5f78LwvnXWpwneLYIHngB5UdpV9VndQrA9b9I23o0zI4frn7qtNl6nMW8
cPnQeZ5rzzZww+UdM71FLq3nhJvnwCM68cV2drj6HeeYN+ifZIWrjwlx277t
NzNcvfCmgCv+7Exw/rdL625qmDDA1S9RS2FKvfJnP4zfFP6rZs6nH/th6nfw
WZwIDv66H2afSBmrvX7ax/1PofyjFlZfrou9husXnrSDO/DZYzg/cvqaLyom
N+D6b7jzaPp5H4bLL7VuK5Vo3GEPM++bq4LdujlX7WHqLxYq9HWzP4LLRycI
Liu/8xIuL7Uwks9o2gc4XzQ4gfW49hd7mPtfhVy/YM7/A85Pv7DstMaG33D1
+2Y/m/V13n97mHuERN5N2rCX0QEmLykuWrCsixnO53UqMe+qY3WAqb+6sl5M
L5Adzlf5lBq8UIoTzk9Iaqli4uZ2gLm/gN9/p/ItHgeYe3KfBD4yusAH58tX
Nwg2BgnA7fMqOZoQYCEI5+c0qi2dZigE5/9YE/vVRkoYzq96s8EqSkwEzneY
81HvPq8o3D0FWRz6R76IwuWn+VirKLwXg/PVfF1U79wQh/N/7bW6+n+vBJx/
xMm3atY2SYT9T021p86TcngJ5eevbbjFryAN98+zktOdXQsRfAD6kZY1
       "]]},
     Annotation[#, "Charting`Private`Tag$69872#2"]& ], 
    TagBox[
     {RGBColor[0, 0, 1], Thickness[0.006], Opacity[1.], 
      LineBox[CompressedData["
1:eJwV1Hk01O8XB3BC9mXsZhSJbCVLWoj7lEIqQpTKLolEG18qa0SbSJYZe0ia
kOzF50lUopIUZc2WNGbsJPSb31/3vM55n3vuvX/cdW5+NidXcXBwqHBycPy/
Hn838fipjzhek/5gWqs1FfZIRQhKeonjLdVcw1afUkHLRcInwEMc2xQ6d51r
S4VVc/oaho7ieNq16ntVeyoUrrtc0GApjj82dhrZfkuFxf948jp0xHHHEutU
zUAqpKiSM5bnSTg6hsLvMJcKEecfLzvPkHBpzY9zafOpcKZ2p2P9BAlrlhSt
9C+kArJ1lr/+i4S33wmK8f2bCqMhuVSxLhLOcP0YlMhBhW1ftZLX15Gw/Qnf
OrIgFb5eM7m77xoJ+1oJOYito4K/M4ekUxjbM/WfU5SoIGBQm3z+CgnLdVI/
KClTwZi1NZN2kYTT3t2wMFSlQr6DRtG4BwlzqdVfC9lEhUAtUkv8XhJGvf+s
rQyoINvZy/t9NQl/SimVVbGjwjHN4FDvWDEcki3wdCmOCsFPeCNfRolhWmyc
b2s8FWib70fLRojhH2pyX/LuUaFbr+T262Ax7DZ24LFdMhUcd47QlM6IYZ8+
rsymDCq4HLSp+m4phm1NC1a4iqhwyk9j0kJSDHsLrOD376kw6lneaG8sipti
XhpLSNDg4b+jcerbRPG4oJiIrRQNPFOWji5tFsVjkZv7E2VoMNhkwsheJ4qp
twQS18rToHdjm/g4tyj+T6TwjIUKDT5PMZ0jm0Vw7+3EYJ7tNKgLUVssPiqC
X/T3bpB2psFVmZZXEdYiWPHzq5FUVxrsLPG7bWchgpNe9A4reNCg+keF4l9D
Eayzs+yR7mkalO3Za2aqIILNvmuHXbhAg0IBt8TuYWH8e6xb2yOGBveTaFr8
F4Txlk8PTcTK2HnLJIR8hLFVYCHvmkr2PKvjbQLdhfHMHwG8sYYGpMDogGFb
YTxoai5nh2lw+8i5updbhPFV+kptUwsNomTNLIPnhLBHZvHxvSM0uESd8v0d
JITHIni+UilpYJex78n7MEGcMOD3xe9uGoTlDdfFBgniyv2z50QT04BOD2/d
e14Qy3fdti1NTgPu59XTte6C+Mf94knOzDQo7VA3KDIVxCxTc8bbJ2kgRhJ4
c0dIEJ+XnQtcaE6D5sh3/VYpAtgy09tpWiAd5m54TgnGC+CKV6OXOUXTQSlh
FffbWAEsq2S2S0IiHYKzDFTRZQFszVfZuouSDmq1hb7aTgK4nhbl1KyZDtFz
NxbFlAWwLf2C4r2D6bDr9H7JtmJ+vPpYySbhxHRoiTM+O/WQH3/Q9dqzkJIO
Ryt03opn8ePWg+Jqo+np4M8le8X2Lj8WWnnv9fVhOmSlDw22+/Pj3OsfbMaf
pwNH29VnHTr8ONrkJ5NvOB2wQYlNzzM+XDL15qScYQYccH1AX37Mh5dkBn0f
ogzovJ60em0uH+4vUOg3MM2AifYrNU6JfHhgpVfmvHUGKPrtU+q/yIc1kytP
KXllQNiDgckBfT6stmajXlxSBiAhqfjRSl78k9zzlZjPAIs3d59sKuHFpvFF
5qPLGXA4Qujd+QJerOzdlCbNnQleC1xcyym8eD8WWxUllglxQ1MXScG82Esz
2PGReib0vmg9arCTF6drmR6UcsyEK763FG/h1ViJp/xTzttMqPrAVbK5iQdH
RzXunHPIgg+dii1/XvJgNVPdOapjFgwPGI2+quHBJQp9v3e7ZoH4fKDiUToP
PuFjlpzmlQVnFBh3w+J4cJXEklFgYBas828/98mOB7/tUT/Ucj8LbpDy9C4M
cOPX/Xy6Al+yIItSb2XUxY23GR6hyH/LgkqVPh/edm78C3Nn6fRkwdAOuVxa
Izd2bBOIOTWcBcZutyUbCrgxK3eL5r/ZLJguvTQr6ceNe12MbvTLZMOJw6aV
FX+5cIp2PTXCKRs+X62hDE9zYYOBvXH+7tlg8VArTILBhQmbZSN3r2zYvii9
z7+bC5NOvuuyP58NElk/v6vXcuHLVqSkwOhsePc7ZiUthAsnFakv5RSz85HN
eyM5uXC02Tf5ep4ckCg91G7Fuwq7/Kav31KfA0kantu5OFbhMvGyFMG3OUB+
cDmtYoETj2s8Q6Pvc0ApMd9jzRgnlhFON3z6LQe0A5Zmxlo4sUUM34mIyRw4
YFAgFZ3AiU9Hl1ioKD2Aa/X/7F+s4cR1CR/wnesPYK6t6JvaFg6saej2k8sj
Fxb6DnBwbuLAs/myeuo+ufCHMbbhmwoHvtQ7W3z4fC4srVa9GCvDgZv291vX
heUCV4DxmvbZf8RTucC33em5QDZVuG4f+Y9oe8q5dv+3XDAf6T92PGOFsO+o
2yhhlwe5GzxWnWxfIiY8jN/dcs0Hr1DL/p6GJYJRP8Kr6ZMPmp3b6+zLl4iV
j5FGbRfzoTRWONg8aYngqcooMYzJB8yomNQ8ukT4TnxOvlycD92l/D+muv4S
wSd9blb8ywcJKCbCBheJ0qVgb9uHDyHiyOKVtKkFwnPIx05c6hE4W6oeUxha
IIjPm7Gr4iPYuffwtpwvC8SG/2SHazQfwZxu0eTDqgWCc/XElRu7H8FpETfP
ZyELxFSK3KtM/0dwqLHJ6p3AAsGv8rbo0YdHsEYvVWlBaZ74sfba0YsJhVAl
sv2tre0scYUmFFdvQAf7PRJbM01midahk3WsfXSYDmI+GNObJbZYHhrUcKCD
1nBuaLjkLJHw5qZRcyAdcp+TthV/mSEafx6PLC+nQ5zX7zyBozOE+R0S02DL
E/Csz4h8eWKayDj+p9l5ZxFIBvDAZs9JIlvh8bpJoxJ40j6p02A/SZx1euG6
36wETPV6lR3MJgmfvte/nxwqgaCJCoFItUnir+TZhZvuJdDr7fX169gE8ck8
oJgeWwIFzs2+IX4TRIW+9dXojhIISFDaQZtkEhPlH8uag55C43aDmQ7p34Sr
0uk6je+loKGb0im1OEZkCEu48AyXwl3NuRe2PWOEtolB4yirFI6tLY36+GCM
+GXeM9XE8wyYXBoyb7THiCUHpRtzOs9A9qOcQYXFL8JI557qys1ncObkn9DE
kJ9E/6qOx9OmZSCRUCVoPTJIsNronsPfymGR7wJJ8c0g8dVCh7V7tBz6QzfJ
sB4OElq315bT58qB7pujdPv0IHGu21E+T6ICTPfd2tHEGCCaR6ysNCwrIJjD
5dSu6R9E4vPbfHcaK6D/LO8rHY5+orOnIeBPbSU4JNNnlLd0EjaSh4ecOqrh
1rLm8tifDuKujGfw0M9qqHN/zPOU6CCaq5UrAxaqQUm7UNpofweRee+QyUu5
GmC8fbjdzu0rERy5+yrrRA2ELOZcibrbTpB49XUrh2sgxzGVe4TRSsidtXio
zvkCOs2E1C33vyIOP5AaPeBaB7sFrhJr39cTUqkwNhhQB49bxu1YlvUEQyhF
+NatOgix/hhx1+YloTW7pU+0qg5MK5Sr857VEW4B4S9HRAno6tZWLG6tIBT1
ROS+1xMgXaBczauZRqx+7FgpTMOQZxh9STa8CrJoS1kkjXqQVk2Y7/2vGjSy
7K3HttZDtHhGUJ5/Dbz2TD/dYlIPXr/Kr+q6vADkKD5Id6yHpOap3fkKGAbv
s/z74uvBIUhpP155BYeqNxaKLNVDX3v48ZkXzRA743ittOMVzO1VNC5K+wJL
R+5wMeiN8Omc4p2bvANg8zzCzDymCY67kPIDu3/BmMst5mr3D0DOdhDRTZqA
gnWe1llvPoGUrQvPG80ZED7zR3cXtR3GDne0bhNdgHbVO7J/pjrgVGt+s1rJ
X3h1fl4LmXdBHW2EOpvxD1jRI9Hl/H0gLslMKKnlRMmk7w0H3H6AnIyUf/4N
LuTYOPr6hOwgCO++uO1GCA8qEdh6ak3fEHx5FCqtZc2L5Lbu4xbxGQHlqZO2
2WR+tM+VNTb3/ie4uF0LXiUoiCwd7FQLVH6Bv6hV9frvQijUQaN6rfEY+A5Z
D+i2iiD1Pwav95r8BoXLYaRwGzHkGjil6k5iAHdcraWsvRjSu0a2M5NkwGjO
4s1iBzH0OnUlWl2GAaXvLq7udRFDI8euLv2UZ8Ae8um/Bn5iKHD5r+lBNQZ4
V1sPz9wUQ2aqJxVrjBlQNq9U7dXIdoOt+npvBlhcbHQ5tJ2EnIS4408+Z0DI
wtcg/Z0kJO6wMXR1HQOeXRlNICMSmpRVd8zDDJCPEmwcMiOh8i2u492NDGDe
t1YPOkJCob2yYXqtDEio7JnMDiChkmXDoNAhBnQtzkZMl5EQfdeIKE1wHM6E
b8hL0hFHRpFjlusPjwPZ6ZTxDn1xtGyZN6psPw5vDQo6uraLo6YHRgvKR8dB
ZUZdYB0SRyY1rVcUT4xDr+cmv8eW4uhQ4aI+j8c4WB3YsgP7iCO/jGjD6Avj
oCuz+/2vPHEUTwpc5xs/Dgt0x9mdZAk0vVy/yNk0DnN/zntvWiuB3oTuym1+
Nw4zpjF9a5QkkKjV31f3WsZhor+0aUVdAj31S/dWaB2HUUm+DLxDAu1tG7ug
3DEOnVdKTfc4SCC1O7l+I0PjUH2AN2V/igS6sqarxvrfOAQzSgyOSUuigNTq
UE5tJuxghVtuJ0ui+xrTcd46TFiYtHGTXiuJvuire7bpMiFgfia2TUUS5T46
5JWhz4QLq3Z8s9CXREbXvveoGjLhjOzLQMPDkmgmLdOJ05QJjns+lcknSKJa
lVilL8eYgNImtfqEpZBkg4e7TjgTguYn64NJUkiTvjEHIphQajNlLy0lhcpG
azgORjJhPf90yEF5KWR8sFXhZBQTVgfMfHiuIYXUAmwWbsQyocVq/myKmRT6
90cg70k8E45yLRdZh0uhfTY5PrbZTPD35tvcMCOFRl/4nTCpY++j35PxZEEK
BanEzmkTTAjnLBVJXpJCfN+OVK7BTEhIOc48zS2NKh0WimdeMqH8ddETUUlp
JEpzjk9pZMKikt3G43rS6KbVr2dVLUyI7MpWnzonjYr1fOydvzMh6YChsiJL
GrXy/3P3mWZCij9IvpmSRmdH4mIoM0ygJppwn51j94tNlGxmO7N7/9DzZWmk
ymB4qM0xoeDMidwjQjIoRu7cTNcCE2puXVWOU5dB1U0OBqorTOhtIZRX3GWQ
o+RGujUfCzYc3KPS3SmDjuw+7CpKYcGvDdxl/t0ySP6ew04q23SOht08/TJI
osgoS1meBXplJi5aP2UQ/bY69/Y1LEAUE1rYrAyaktEzc1BgwfFfu0gq4rLI
9/IOkej1LLgbBcu++2XRvaRO3ZuaLFisNfjyr1YWvVTfF3vEgAXCfB9h4KUs
Ks2yYLWyrWjjXtjQKIvWH3Ef3GfIAtORm6Gx72XRW6/AQIOdLLgn0qMu0SOL
9ANcj0kbs2Cjc2jIhiVZVC7S6169iwXOHA2qBw3kUKjxph3F5ixo2H0wmFoh
h1rvsELO2rHAeljspEGNHPp5NmbpDdu919utvtfKoUeW2zTX2bNgvuW4CrlR
Dr1iDae1sa1xxLs19bMc2sUY6NQ5yoJ4n+sbUifkUKTCzfEfx1jglPiyLVmD
jCwryIcEXFjwe2tU7TYtMproLvY7xvZ/38wLOnTIyEj3jHkh2/FrW6/K7CCj
lkXLDeyfCQ0FvWrJZmRUI+BGjXRjgWbt35AkDzLi8zVJ+e3BgoVhfc37GWS0
qCMfFXuaBVt2lnBk55DR5eTLcd/Y9k/Q+ErPJyNzF7qFujcLfhorhDcUkZF8
aVn7G7a/JvN1TNeRUdVUKXCeYUHZvq4Imz4ySiyQfHbyLAv8noR9F1WkICXF
ZpH58ywo5PpbTFGmoMdNVfVGF1gw4nApSlWNgnb7xGpfY9tptbc2aFNQkteQ
gdhFFhxwto0+iygoT/YXSeUS+16kDbrvXSio4n0a1+5AFnieyuL95kFBvU83
X7rGdk4tuWfIi4Le27TkvmZbzls0Zsmfgkj8ymDxHwv4Xi30aIZTUEaD+SnL
IBbskbvwbFsUBelXbmi9w3aY33iMSSwFsV4L/PnA9jxlQO94PAXd5Oy7aRnM
At3zJ/hP3acg+cv7526zffbt197zqRQUU1yx7j3bhWuty0LSKahfz0lE6DJ7
v4vNsTeyKWjZLfSFBdv/A4f13RE=
       "]]},
     Annotation[#, "Charting`Private`Tag$69872#3"]& ], 
    TagBox[
     {RGBColor[0, 0, 1], Thickness[0.006], Opacity[1.], 
      Dashing[{Small, Small}], LineBox[CompressedData["
1:eJxTTMoPSmViYGCwAWIQHX3qw+qN2UIHOt2PHbj74YD9DHWpeX+/C8L511qc
J3i2CB7ogPKjtKvqszoF4PwXaVuPhtnxw/lTp83W4yzmhfND53muPdvADec7
ZnqLXFrPeaAdynfgEZ34Yjs7XH7HOeYN+idZ4fbHhLht3/abGS4vvCngij87
E5z/7dK6mxomDHD1S9RSmFKv/NkP4zeF/6qZ8+kHnL+Dz+JEcPDX/TD9ImWs
9vppH+HyRy2svlwXew2XF560gzvw2WO4fOT0NV9UTG7A5W+482j6eR+G85da
t5VKNO6wh6n/5qpgt27OVXuY/MVChb5u9kdw+egEwWXld17C+VILI/mMpn2A
80WDE1iPa3+B81+FXL9gzv8Dzk+/sOy0xobfcP6+2c9mfZ33H26fkMi7SRv2
MjrA+JLiogXLupjhfF6nEvOuOlYHWHxcXVkvphfIDpdX+ZQavFCK06ELyk9I
aqli4uZ2gNlXwO+/U/kWD1x97pPAR0YX+ODy8tUNgo1BAnB5r5KjCQEWgnB+
TqPa0mmGQnD+jzWxX22khOHuqXqzwSpKTARunsOcj3r3eUUR9mdx6B/5guBP
87FWUXgvBuer+bqo3rkhDjf/116rq//3SsD9c8TJt2rWNkmE/U9NtafOk4Lz
t3jebgq6LwU3L39twy1+BWm4vE98cFuegzRcXktQzehsAkI+LX0B+80UBH/R
Xqm7TzIQ6iWz+Dv+FEg7dEP5HId/3NVulIa777v0I+PoiQj+s5LTnV0LEXwA
EVoKiw==
       "]]},
     Annotation[#, "Charting`Private`Tag$69872#4"]& ]}, {}},
  AspectRatio->1,
  Axes->{True, True},
  AxesLabel->{None, None},
  AxesOrigin->{-4.605169951030429, 0},
  CoordinatesToolOptions:>{"DisplayFunction" -> ({
      Exp[
       Part[#, 1]], 
      Part[#, 2]}& ), "CopiedValueFunction" -> ({
      Exp[
       Part[#, 1]], 
      Part[#, 2]}& )},
  DisplayFunction->Identity,
  Frame->{{True, True}, {True, True}},
  FrameLabel->{{
     FormBox["\"Pextended \"", TraditionalForm], 
     FormBox["\"\"", TraditionalForm]}, {
     FormBox["\"Affinity fold difference to EO and C\"", TraditionalForm], 
     FormBox["\"\"", TraditionalForm]}},
  FrameStyle->{{
     Directive[
      GrayLevel[0], 50], 
     Thickness[0.005]}, {
     Directive[
      GrayLevel[0], 50], 
     Thickness[0.005]}, {
     Directive[
      GrayLevel[1], 50], 
     Thickness[0]}, {
     Directive[
      GrayLevel[1], 50], 
     Thickness[0]}},
  FrameTicks->FrontEndValueCache[{{Automatic, Automatic}, {Quiet[
       Charting`ScaledTicks[{Log, Exp}][#, #2, {6, 6}]]& , 
      Charting`ScaledFrameTicks[{Log, Exp}]}}, {{
     Automatic, Automatic}, {{{-4.605170185988091, 
        FormBox[
         TagBox[
          InterpretationBox[
           StyleBox["\"0.01\"", ShowStringCharacters -> False], 0.01, 
           AutoDelete -> True], NumberForm[#, {
            DirectedInfinity[1], 2}]& ], TraditionalForm], {0.01, 
        0.}}, {-2.3025850929940455`, 
        FormBox[
         TagBox[
          InterpretationBox[
           StyleBox["\"0.10\"", ShowStringCharacters -> False], 0.1, 
           AutoDelete -> True], NumberForm[#, {
            DirectedInfinity[1], 2}]& ], TraditionalForm], {0.01, 0.}}, {0., 
        FormBox["1", TraditionalForm], {0.01, 0.}}, {2.302585092994046, 
        FormBox["10", TraditionalForm], {0.01, 0.}}, {4.605170185988092, 
        FormBox["100", TraditionalForm], {0.01, 0.}}, {6.907755278982137, 
        FormBox["1000", TraditionalForm], {0.01, 0.}}, {-6.907755278982137, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-6.214608098422191, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-5.809142990314028, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-5.521460917862246, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-5.298317366548036, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-5.115995809754082, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-4.961845129926823, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-4.8283137373023015`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-4.710530701645918, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-3.912023005428146, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-3.506557897319982, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-3.2188758248682006`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-2.995732273553991, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-2.8134107167600364`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-2.659260036932778, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-2.5257286443082556`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-2.4079456086518722`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-1.6094379124341003`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-1.2039728043259361`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-0.916290731874155, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-0.6931471805599453, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-0.5108256237659907, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-0.35667494393873245`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-0.2231435513142097, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-0.10536051565782628`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       0.6931471805599453, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       1.0986122886681098`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       1.3862943611198906`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       1.6094379124341003`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       1.791759469228055, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       1.9459101490553132`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       2.0794415416798357`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       2.1972245773362196`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       2.995732273553991, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       3.4011973816621555`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       3.6888794541139363`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       3.912023005428146, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       4.0943445622221, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       4.248495242049359, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       4.382026634673881, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       4.499809670330265, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       5.298317366548036, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       5.703782474656201, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       5.991464547107982, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       6.214608098422191, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       6.396929655216146, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       6.551080335043404, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       6.684611727667927, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       6.802394763324311, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       7.600902459542082, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       8.006367567650246, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       8.294049640102028, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       8.517193191416238, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       8.699514748210191, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       8.85366542803745, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       8.987196820661973, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       9.104979856318357, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       9.210340371976184, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}}, {{-4.605170185988091, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 
        0.}}, {-2.3025850929940455`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}}, {0., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}}, {
       2.302585092994046, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}}, {
       4.605170185988092, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}}, {
       6.907755278982137, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 
        0.}}, {-6.907755278982137, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-6.214608098422191, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-5.809142990314028, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-5.521460917862246, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-5.298317366548036, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-5.115995809754082, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-4.961845129926823, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-4.8283137373023015`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-4.710530701645918, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-3.912023005428146, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-3.506557897319982, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-3.2188758248682006`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-2.995732273553991, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-2.8134107167600364`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-2.659260036932778, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-2.5257286443082556`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-2.4079456086518722`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-1.6094379124341003`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-1.2039728043259361`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-0.916290731874155, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-0.6931471805599453, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-0.5108256237659907, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-0.35667494393873245`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-0.2231435513142097, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
        0.}}, {-0.10536051565782628`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       0.6931471805599453, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       1.0986122886681098`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       1.3862943611198906`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       1.6094379124341003`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       1.791759469228055, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       1.9459101490553132`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       2.0794415416798357`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       2.1972245773362196`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       2.995732273553991, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       3.4011973816621555`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       3.6888794541139363`, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       3.912023005428146, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       4.0943445622221, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       4.248495242049359, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       4.382026634673881, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       4.499809670330265, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       5.298317366548036, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       5.703782474656201, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       5.991464547107982, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       6.214608098422191, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       6.396929655216146, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       6.551080335043404, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       6.684611727667927, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       6.802394763324311, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       7.600902459542082, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       8.006367567650246, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       8.294049640102028, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       8.517193191416238, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       8.699514748210191, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       8.85366542803745, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       8.987196820661973, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       9.104979856318357, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
       9.210340371976184, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}}}}],
  GridLines->{None, None},
  GridLinesStyle->Directive[
    GrayLevel[0.5, 0.4]],
  ImagePadding->All,
  ImageSize->{872.056930513394, Automatic},
  Method->{
   "DefaultBoundaryStyle" -> Automatic, 
    "DefaultGraphicsInteraction" -> {
     "Version" -> 1.2, "TrackMousePosition" -> {True, False}, 
      "Effects" -> {
       "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, 
        "Droplines" -> {
         "freeformCursorMode" -> True, 
          "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> 
    AbsolutePointSize[6], "ScalingFunctions" -> None},
  PlotRange->{{-4.605169951030429, 6.907755044024475}, {-0.05, 1.05}},
  PlotRangeClipping->True,
  PlotRangePadding->{{
     Scaled[0.02], 
     Scaled[0.02]}, {0, 0}},
  Ticks->{Quiet[
     Charting`ScaledTicks[{Log, Exp}][#, #2, {6, 6}]]& , 
    Automatic}]], "Output",
 CellChangeTimes->{
  3.847638747497096*^9, 3.847638853455633*^9, 3.847638923593987*^9, 
   3.84763908789396*^9, 3.847639144069002*^9, 3.8476392035360947`*^9, 
   3.847639273688445*^9, 3.847639398887012*^9, {3.847724832702022*^9, 
   3.847724851264069*^9}, 3.8477249020620947`*^9, {3.847724935013397*^9, 
   3.847724957774115*^9}, 3.847724991320692*^9, 3.849197320886881*^9, 
   3.849197568205814*^9, 3.849197623250534*^9, 3.850562771871269*^9, 
   3.850566620130632*^9, 3.85056667273324*^9, 3.85747550852135*^9, 
   3.857475741053581*^9, 3.8574767872339973`*^9, 3.857477341064815*^9, 
   3.857477496961897*^9, 3.867231123252734*^9, 3.867231185743012*^9},
 CellLabel->"Out[27]=",ExpressionUUID->"27b9da7f-9b1b-4807-9783-015d04eaf155"]
}, Open  ]]
}, Open  ]]
},
WindowSize->{1611, 997},
WindowMargins->{{1661, Automatic}, {Automatic, 0}},
Magnification->1.100000023841858,
FrontEndVersion->"12.3 for Mac OS X x86 (64-bit) (July 9, 2021)",
StyleDefinitions->"Default.nb",
ExpressionUUID->"58485805-52d8-4774-9e1b-91cb9e83d10e"
]
(* End of Notebook Content *)

(* Internal cache information *)
(*CellTagsOutline
CellTagsIndex->{}
*)
(*CellTagsIndex
CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
Cell[CellGroupData[{
Cell[579, 22, 682, 11, 83, "Subsubtitle",ExpressionUUID->"5bd0bd57-c650-483d-a4b3-9bce0f395b51"],
Cell[CellGroupData[{
Cell[1286, 37, 1916, 60, 295, "Input",ExpressionUUID->"3f76ff3e-8af3-413b-b7a3-0fa7a32792cb"],
Cell[3205, 99, 2223, 57, 112, "Output",ExpressionUUID->"becf0b34-70ee-477a-9d5b-8609338d4130"]
}, Open  ]],
Cell[CellGroupData[{
Cell[5465, 161, 2078, 54, 115, "Input",ExpressionUUID->"1f07cca5-ba04-422f-8128-2579e30feafc"],
Cell[7546, 217, 1371, 37, 83, "Output",ExpressionUUID->"d450dfc6-b43c-4289-aa97-0e5fab457948"]
}, Open  ]]
}, Open  ]],
Cell[CellGroupData[{
Cell[8966, 260, 565, 10, 34, "Subsubtitle",ExpressionUUID->"9d6d66e3-64af-47cb-8152-70dcd74647a1"],
Cell[CellGroupData[{
Cell[9556, 274, 4769, 107, 320, "Input",ExpressionUUID->"a51e67d1-de87-466a-a050-ca2f14c87ca5"],
Cell[14328, 383, 4055, 99, 139, "Output",ExpressionUUID->"e170f713-68e2-42fa-8a9f-f98e2cca98f8"]
}, Open  ]],
Cell[18398, 485, 205, 4, 34, "Input",ExpressionUUID->"be49b56b-b4fe-44bd-a048-0da2cfb0e400"],
Cell[18606, 491, 5040, 112, 213, "Input",ExpressionUUID->"c37e7538-ece4-474a-aa16-6922a6fe0170"],
Cell[CellGroupData[{
Cell[23671, 607, 6694, 166, 219, "Input",ExpressionUUID->"b76600ae-7e2b-4bb5-82ed-140cf50aa719"],
Cell[30368, 775, 35236, 735, 992, "Output",ExpressionUUID->"27b9da7f-9b1b-4807-9783-015d04eaf155"]
}, Open  ]]
}, Open  ]]
}
]
*)

